home *** CD-ROM | disk | FTP | other *** search
/ Golf Digest's Best Places to Play / Golf Digest's Best Places to Play.iso / diamond / dbrs_ibm.dir / 00003_Script_MainScript < prev    next >
Text File  |  1995-05-15  |  1KB  |  36 lines
  1. on exitFrame
  2.   go to marker(0)+2
  3. end
  4.  
  5. on mouseDown
  6.   set ButtonNum=the clickOn
  7.   if ButtonNum>0 then
  8.     set ButtonName=the name of cast (the castNum of sprite ButtonNum)
  9.     if (ButtonNum >1) and (ButtonNum < 7) then
  10.       if PressBtn(ButtonNum) then
  11.         AllPuppetsOff
  12.         if ButtonNum=2 then go to "ChoosingIntro"
  13.         if ButtonNum=3 then go to "SpecialIntro"
  14.         if ButtonNum=4 then go to "HowToIntro"
  15.         if ButtonNum=5 then go to "HistoryIntro"
  16.         if ButtonNum=6 then go to "FreeIntro"
  17.       end if
  18.     end if
  19.     if ButtonName="Exit" then
  20.       if PressBtn(ButtonNum) then
  21.         AllPuppetsOff
  22.         puppetsound ("EndMusic")
  23.         updateStage
  24.         go to "Exit Guide"
  25.       end if
  26.     end if
  27.     if chars(ButtonName,1,4) = "Help" then
  28.       if PressBtn(ButtonNum) then
  29.         showHelp
  30.         puppetsprite ButtonNum, true
  31.         set the castNum of sprite ButtonNum to the number of cast (ButtonName)
  32.         puppetsprite ButtonNum, false
  33.       end if
  34.     end if
  35.   end if
  36. end mouseDown